home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / submenu / 00216.ls < prev    next >
Encoding:
Text File  |  1995-03-29  |  975 b   |  41 lines
  1. on exitFrame
  2.   global selectedgame, descriptions, beyex, beyey, setall, wrinkle
  3.   unLoad(1, the frame - 1)
  4.   preLoad(the frame, marker("endpreload2"))
  5.   setupvolume()
  6.   preLoadCast("ding1")
  7.   puppetSprite(14, 1)
  8.   puppetSprite(24, 1)
  9.   puppetSprite(48, 1)
  10.   puppetSprite(3, 1)
  11.   puppetSprite(4, 1)
  12.   puppetSprite(20, 1)
  13.   puppetSprite(21, 1)
  14.   puppetSprite(22, 1)
  15.   puppetSprite(16, 1)
  16.   puppetSprite(17, 1)
  17.   if descriptions = 1 then
  18.     set the castNum of sprite 14 to the number of cast "secr1"
  19.   end if
  20.   set beyex to the locH of sprite 3
  21.   set beyey to the locV of sprite 3
  22.   if setall = 1 then
  23.     set the castNum of sprite 24 to the number of cast ("all" & setall)
  24.     setalllevels()
  25.     set wrinkle to 1
  26.     set selectedgame to 1
  27.     grablevel()
  28.     go("setall")
  29.   else
  30.     if value(selectedgame) <> 0 then
  31.       set wrinkle to 1
  32.       grablevel()
  33.     else
  34.       newcomer()
  35.       set wrinkle to 1
  36.       set selectedgame to 1
  37.       grablevel()
  38.     end if
  39.   end if
  40. end
  41.